// This file was decompiled using SASCM.ini published by GTAG (http://gtagmodding.com/opcode-database/) on 9.8.2018
{$CLEO .cs}

//-------------MAIN---------------
0@ = 1
 
0ADF: add_dynamic_GXT_entry "RRRC" text "Carrec: ~1~"

:RRRPLAYER_1
wait 0        
if and
0ADC:   test_cheat "rec"

//0AB0:   key_pressed 17
//0AB0:   key_pressed 67
Actor.Driving($PLAYER_ACTOR)
$ONMISSION == 0
89AE:   not actor $PLAYER_ACTOR driving_train
jf @RRRPLAYER_1
jump @RRRPLAYER_2

:RRRPLAYER_2
wait 100
1@ = Actor.CurrentCar($PLAYER_ACTOR)
jump @RRRPLAYER_3

:RRRPLAYER_3
wait 0
0513: show_text_box_1number 'RRRC' number 0@  //
jump @RRRPLAYER_4

:RRRPLAYER_4
wait 100
if
0AB0:   key_pressed 37
jf @RRRPLAYER_6
gosub @RRRPLAYER_10
if
    0@ < 2
jf @RRRPLAYER_5
0@ = 834

:RRRPLAYER_5
0@ -= 1

:RRRPLAYER_6
wait 0
if
0AB0:   key_pressed 39
jf @RRRPLAYER_8
gosub @RRRPLAYER_10
if
    0@ > 833
jf @RRRPLAYER_7
0@ = 1

:RRRPLAYER_7
0@ += 1

:RRRPLAYER_8
wait 0
if or
    not Actor.Driving($PLAYER_ACTOR)
    0ADC:   test_cheat "STOP"
jf @RRRPLAYER_9
03E6: remove_text_box
if
060E:   car 1@ assigned_to_path
jf @RRRPLAYER_1
gosub @RRRPLAYER_10
jump @RRRPLAYER_1

:RRRPLAYER_9
wait 0
if
860E:   not car 1@ assigned_to_path
jf @RRRPLAYER_11
07C0: load_path 0@
if
07C1:   path 0@ available
jf @RRRPLAYER_9
05EB: assign_car 1@ to_path 0@
jump @RRRPLAYER_11

:RRRPLAYER_10
05EC: release_car 1@ from_path
0873: release_path 0@
return

:RRRPLAYER_11
wait 0
if
0AB0:   key_pressed 38
jf @RRRPLAYER_13
gosub @RRRPLAYER_10
if
    0@ > 823
jf @RRRPLAYER_12
0@ = 1

:RRRPLAYER_12
0@ += 10

:RRRPLAYER_13
wait 0
if
0AB0:   key_pressed 40
jf @RRRPLAYER_3
gosub @RRRPLAYER_10
if
    0@ < 11
jf @RRRPLAYER_14
0@ = 834
jump @RRRPLAYER_3

:RRRPLAYER_14
0@ -= 10
jump @RRRPLAYER_3